home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / pctj8402.arc / SEND.ASM < prev    next >
Assembly Source File  |  1983-08-04  |  955b  |  27 lines
  1.     TITLE    SEND CHARACTER TO PARALLEL PORT
  2.  
  3.     PAGE ,132            ;SET PAGE WIDTH
  4. ;*******************************************************************************
  5. ;PROGRAM DESIGNED TO OUTPUT A CHARACTER TO PARALLEL PORT FOR USE WITH
  6. ;TTL PROGRAM.  THIS PROGRAM SERVES AS THE 'INCREMENTER' FOR THE
  7. ;INPUT COMBINATIONS TO THE TTL LOGIC
  8. ;****COPYRIGHT 1983 BY WILLIAM H. MURRAY & CHRIS H. PAPPAS****
  9. ;*******************************************************************************
  10.  
  11. MYCODE    SEGMENT BYTE PUBLIC
  12.     ASSUME CS:MYCODE
  13.     PUBLIC SEND
  14. SEND    PROC    FAR
  15.     PUSH    BP            ;SAVE BP REGISTER
  16.     MOV    BP,SP            ;ESTABLISH NEW BP VALUE
  17.     MOV    DX,00H            ;BASE ADDRESS OF PRINTER
  18.     MOV    SI,[BP]+6        ;GET LOCATION OF VALUE
  19.     MOV    AX,[SI]            ;MOVE DATA INTO AX REG.
  20.     MOV    AH,00H            ;CLEAR AH VALUE TO PRINT
  21.     INT    17H            ;PRINT CHAR. IN AL REG
  22.     POP    BP            ;GET OLD BP VALUE
  23.     RET    2            ;RESET STACK VALUES
  24. SEND    ENDP                ;END PROCEDURE
  25. MYCODE    ENDS                ;END SEGMENT
  26.     END                ;END PROGRAM
  27.